-module(tr_acceptor_sup).
-behaviour(supervisor).

-export([start_link/0,
         start_child/1]).

-export([init/1]).

start_link() ->
    supervisor:start_link({local, ?MODULE}, ?MODULE, []).

start_child(Socket) ->
    supervisor:start_child(?MODULE, [Socket]).

init([]) ->
    {ok, {{simple_one_for_one, 0, 1}, 
          [{tr_acceptor, 
            {tr_acceptor, start_link, []}, 
            temporary, 
            brutal_kill, 
            worker, 
            []}]}}.
